home *** CD-ROM | disk | FTP | other *** search
- From: smidt@fy.chalmers.se (Peter Smidt)
- Newsgroups: comp.sources.misc
- Subject: v16i102: mfold - Maaniker's fold and column making, Patch01
- Message-ID: <1991Feb15.203918.11168@sparky.IMD.Sterling.COM>
- Date: 15 Feb 91 20:39:18 GMT
- Approved: kent@sparky.imd.sterling.com
- X-Checksum-Snefru: 209c6d93 7a8e5af9 afb6ce26 538e97f5
-
- Submitted-by: Peter Smidt <smidt@fy.chalmers.se>
- Posting-number: Volume 16, Issue 102
- Archive-name: mfold/patch01
- Patch-To: mfold: Volume 15, Issue 82
-
- A small but serious bug have been fixed. When mfold gets the '-n'
- flag, mfold 1.04 will delete lines under certain circumstances.
- Here is a patch to get mfold 1.05 .
-
- (The program mfold(1) folds text and makes columns.)
-
- Mvh Peter Smidt
- -----
- #! /bin/sh
- # This is a shell archive. Remove anything before this line, then unpack
- # it by saving it into a file and typing "sh file". To overwrite existing
- # files, type "sh file -c". You can also feed this as standard input via
- # unshar, or by typing "sh <file", e.g.. If this archive is complete, you
- # will see the following message at the end:
- # "End of shell archive."
- # Contents: patch.README patch.mfold.c
- # Wrapped by smidt@coco on Sat Feb 9 01:08:06 1991
- PATH=/bin:/usr/bin:/usr/ucb ; export PATH
- if test -f 'patch.README' -a "${1}" != "-c" ; then
- echo shar: Will not clobber existing file \"'patch.README'\"
- else
- echo shar: Extracting \"'patch.README'\" \(465 characters\)
- sed "s/^X//" >'patch.README' <<'END_OF_FILE'
- X*** ../README Sat Feb 9 01:01:03 1991
- X--- README Sat Feb 9 00:59:47 1991
- X***************
- X*** 1,4 ****
- X! Version 1.05, last change 9 february 1991.
- X
- X The program mfold is a simple folding and column making program.
- X unpack the files from the shar file put them in a empty
- X--- 1,4 ----
- X! Version 1.04, last change 30 september 1990.
- X
- X The program mfold is a simple folding and column making program.
- X unpack the files from the shar file put them in a empty
- END_OF_FILE
- if test 465 -ne `wc -c <'patch.README'`; then
- echo shar: \"'patch.README'\" unpacked with wrong size!
- fi
- # end of 'patch.README'
- fi
- if test -f 'patch.mfold.c' -a "${1}" != "-c" ; then
- echo shar: Will not clobber existing file \"'patch.mfold.c'\"
- else
- echo shar: Extracting \"'patch.mfold.c'\" \(2971 characters\)
- sed "s/^X//" >'patch.mfold.c' <<'END_OF_FILE'
- X*** ../mfold.c Sat Feb 9 00:56:05 1991
- X--- mfold.c Sat Feb 9 00:59:57 1991
- X***************
- X*** 13,18 ****
- X--- 13,21 ----
- X putcolu(insert[doo]);\
- X }
- X #define BOT_LINES 1
- X+ #define STR 15
- X+ #define TEST_STR 25
- X+ #define GET_NUM_STR 25
- X
- X int colu_chars, colu_lines;
- X int page_len = PAGE_LEN, columns = 1, lin = 0, bot_lines = BOT_LINES;
- X***************
- X*** 43,54 ****
- X for ( index = 1; index < argc; index++) {
- X if ( argv[index][0] != '-' ) {
- X if ( index == 1 || (argv[index - 1][0] == '-' &&
- X! argv[index - 1][1] != 'i' && argv[index - 1][1] != 'D' || index > 2
- X && argv[index - 2][0] == '-' && (argv[index - 2][1] == 'i'
- X || argv[index - 2][1] == 'D')) && !got_file ) {
- X got_file = TRUE;
- X index_file = index;
- X! } else if ( index_insert != index && index_delim != index ) {
- X fprintf(stderr, "Option '%s' not allowed.\n", argv[index]);
- X usage(11);
- X }
- X--- 46,57 ----
- X for ( index = 1; index < argc; index++) {
- X if ( argv[index][0] != '-' ) {
- X if ( index == 1 || (argv[index - 1][0] == '-' &&
- X! argv[index - 1][0] != 'i' && argv[index - 1][0] != 'D' || index > 2
- X && argv[index - 2][0] == '-' && (argv[index - 2][1] == 'i'
- X || argv[index - 2][1] == 'D')) && !got_file ) {
- X got_file = TRUE;
- X index_file = index;
- X! } else {
- X fprintf(stderr, "Option '%s' not allowed.\n", argv[index]);
- X usage(11);
- X }
- X***************
- X*** 55,61 ****
- X }
- X doo = index_insert != index && index_delim != index
- X && index_file != index;
- X! if ( argv[index][0] == '-' ) switch ( argv[index][1] ) {
- X case 'i':
- X check_it(&got_insert, "-i", 8, doo, &index_insert, index + 1);
- X break;
- X--- 58,64 ----
- X }
- X doo = index_insert != index && index_delim != index
- X && index_file != index;
- X! switch ( argv[index][1] ) {
- X case 'i':
- X check_it(&got_insert, "-i", 8, doo, &index_insert, index + 1);
- X break;
- X***************
- X*** 75,81 ****
- X check_it(&got_mrandom, "-r", 37, doo, &index_mrandom, index);
- X break;
- X case 'd':
- X! check_it(&got_dyslexi, "-d", 55, doo, &dummy, index);
- X break;
- X case 't':
- X check_it(&got_tab_len, "-t", 13, doo, &index_tab_len, index);
- X--- 78,84 ----
- X check_it(&got_mrandom, "-r", 37, doo, &index_mrandom, index);
- X break;
- X case 'd':
- X! check_it(&got_dyslexi, "-d", 11, doo, &dummy, index);
- X break;
- X case 't':
- X check_it(&got_tab_len, "-t", 13, doo, &index_tab_len, index);
- X***************
- X*** 457,472 ****
- X putcolu(c)
- X char c;
- X {
- X- int i;
- X-
- X if ( c == '\n' || col == colu_chars ) {
- X! if ( c == '\n' && str_len(cur_page[lin]) == ins_len ) {
- X! for ( i = 0; i < ins_len; i++ ) {
- X! cur_page[lin][i] = '\0';
- X! }
- X! col = 0;
- X! }
- X! if ( col ) advance_line();
- X return;
- X }
- X cur_page[lin][col++] = c;
- X--- 460,467 ----
- X putcolu(c)
- X char c;
- X {
- X if ( c == '\n' || col == colu_chars ) {
- X! advance_line();
- X return;
- X }
- X cur_page[lin][col++] = c;
- END_OF_FILE
- if test 2971 -ne `wc -c <'patch.mfold.c'`; then
- echo shar: \"'patch.mfold.c'\" unpacked with wrong size!
- fi
- # end of 'patch.mfold.c'
- fi
- echo shar: End of shell archive.
- exit 0
-
- exit 0 # Just in case...
- --
- Kent Landfield INTERNET: kent@sparky.IMD.Sterling.COM
- Sterling Software, IMD UUCP: uunet!sparky!kent
- Phone: (402) 291-8300 FAX: (402) 291-4362
- Please send comp.sources.misc-related mail to kent@uunet.uu.net.
-